home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / programming / e / powerd0.06 / modules / libraries / gadtools.m < prev    next >
Text File  |  1999-11-30  |  5KB  |  202 lines
  1. MODULE    'utility/tagitem',
  2.             'intuition/intuition',
  3.             'graphics/gfx'
  4.  
  5. ENUM    GENERIC_KIND,
  6.         BUTTON_KIND,
  7.         CHECKBOX_KIND,
  8.         INTEGER_KIND,
  9.         LISTVIEW_KIND,
  10.         MX_KIND,
  11.         NUMBER_KIND,
  12.         CYCLE_KIND,
  13.         PALETTE_KIND,
  14.         SCROLLER_KIND,
  15.         SLIDER_KIND=11,
  16.         STRING_KIND,
  17.         TEXT_KIND,
  18.         NUM_KINDS
  19.  
  20. CONST    ARROWIDCMP=IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_INTUITICKS|IDCMP_MOUSEBUTTONS,
  21.         BUTTONIDCMP=IDCMP_GADGETUP,
  22.         CHECKBOXIDCMP=IDCMP_GADGETUP,
  23.         INTEGERIDCMP=IDCMP_GADGETUP,
  24.         LISTVIEWIDCMP=IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_MOUSEMOVE|ARROWIDCMP,
  25.         MXIDCMP=IDCMP_GADGETDOWN,
  26.         NUMBERIDCMP=0,
  27.         CYCLEIDCMP=IDCMP_GADGETUP,
  28.         PALETTEIDCMP=IDCMP_GADGETUP,
  29.         SCROLLERIDCMP=IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_MOUSEMOVE,
  30.         SLIDERIDCMP=IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_MOUSEMOVE,
  31.         STRINGIDCMP=IDCMP_GADGETUP,
  32.         TEXTIDCMP=0
  33.  
  34. OBJECT NewGadget
  35.     LeftEdge:WORD,
  36.     TopEdge:WORD,
  37.     Width:WORD,
  38.     Height:WORD,
  39.     GadgetText:PTR TO CHAR,
  40.     TextAttr:PTR TO TextAttr,
  41.     GadgetID:UWORD,
  42.     Flags:ULONG,
  43.     VisualInfo:APTR,
  44.     UserData:APTR
  45.  
  46.  
  47. SET    PLACETEXT_LEFT,
  48.         PLACETEXT_RIGHT,
  49.         PLACETEXT_ABOVE,
  50.         PLACETEXT_BELOW,
  51.         PLACETEXT_IN,
  52.         NG_HIGHLABEL
  53.  
  54. OBJECT NewMenu
  55.     Type:UBYTE,
  56.     Label:PTR TO CHAR,
  57.     CommKey:PTR TO CHAR,
  58.     Flags:UWORD,
  59.     MutualExclude:LONG,
  60.     UserData:APTR
  61.  
  62. CONST    MENU_IMAGE=128
  63.  
  64. ENUM    NM_END,
  65.         NM_TITLE,
  66.         NM_ITEM,
  67.         NM_SUB,
  68.         NM_IGNORE=64,
  69.         NM_BARLABEL=-1
  70.  
  71. CONST    IM_ITEM=NM_ITEM|MENU_IMAGE,
  72.         IM_SUB=NM_SUB|MENU_IMAGE
  73.  
  74. CONST    NM_MENUDISABLED=MENUENABLED,
  75.         NM_ITEMDISABLED=ITEMENABLED,
  76.         NM_COMMANDSTRING=COMMSEQ
  77. //        NM_FLAGMASK=~(COMMSEQ|ITEMTEXT|HIGHFLAGS),
  78. //        NM_FLAGMASK_V39=~(ITEMTEXT|HIGHFLAGS)
  79. /*
  80. #define GTMENU_USERDATA(menu) (* ( (APTR *)(((struct Menu *)menu)+1) ) )
  81. #define GTMENUITEM_USERDATA(menuitem) (* ( (APTR *)(((struct MenuItem *)menuitem)+1) ) )
  82. */
  83.  
  84. ENUM    GTMENU_TRIMMED=1,
  85.         GTMENU_INVALID,
  86.         GTMENU_NOMEM
  87.  
  88. CONST    MX_WIDTH=17,
  89.         MX_HEIGHT=9,
  90.         CHECKBOX_WIDTH=26,
  91.         CHECKBOX_HEIGHT=11
  92.  
  93. CONST    GT_TagBase                =TAG_USER+$80000,
  94.         GTVI_NewWindow            =GT_TagBase+1,
  95.         GTVI_NWTags                =GT_TagBase+2,
  96.         GT_Private0                =GT_TagBase+3,
  97.         GTCB_Checked            =GT_TagBase+4,
  98.         GTLV_Top                    =GT_TagBase+5,
  99.         GTLV_Labels                =GT_TagBase+6,
  100.         GTLV_ReadOnly            =GT_TagBase+7,
  101.         GTLV_ScrollWidth        =GT_TagBase+8,
  102.         GTMX_Labels                =GT_TagBase+9,
  103.         GTMX_Active                =GT_TagBase+10,
  104.         GTTX_Text                =GT_TagBase+11,
  105.         GTTX_CopyText            =GT_TagBase+12,
  106.         GTNM_Number                =GT_TagBase+13,
  107.         GTCY_Labels                =GT_TagBase+14,
  108.         GTCY_Active                =GT_TagBase+15,
  109.         GTPA_Depth                =GT_TagBase+16,
  110.         GTPA_Color                =GT_TagBase+17,
  111.         GTPA_ColorOffset        =GT_TagBase+18,
  112.         GTPA_IndicatorWidth    =GT_TagBase+19,
  113.         GTPA_IndicatorHeight    =GT_TagBase+20,
  114.         GTSC_Top                    =GT_TagBase+21,
  115.         GTSC_Total                =GT_TagBase+22,
  116.         GTSC_Visible            =GT_TagBase+23,
  117.         GTSC_Overlap            =GT_TagBase+24,
  118.         GTSL_Min                    =GT_TagBase+38,
  119.         GTSL_Max                    =GT_TagBase+39,
  120.         GTSL_Level                =GT_TagBase+40,
  121.         GTSL_MaxLevelLen        =GT_TagBase+41,
  122.         GTSL_LevelFormat        =GT_TagBase+42,
  123.         GTSL_LevelPlace        =GT_TagBase+43,
  124.         GTSL_DispFunc            =GT_TagBase+44,
  125.         GTST_String                =GT_TagBase+45,
  126.         GTST_MaxChars            =GT_TagBase+46,
  127.         GTIN_Number                =GT_TagBase+47,
  128.         GTIN_MaxChars            =GT_TagBase+48,
  129.         GTMN_TextAttr            =GT_TagBase+49,
  130.         GTMN_FrontPen            =GT_TagBase+50,
  131.         GTBB_Recessed            =GT_TagBase+51,
  132.         GT_VisualInfo            =GT_TagBase+52,
  133.         GTLV_ShowSelected        =GT_TagBase+53,
  134.         GTLV_Selected            =GT_TagBase+54,
  135.         GT_Reserved1            =GT_TagBase+56,
  136.         GTTX_Border                =GT_TagBase+57,
  137.         GTNM_Border                =GT_TagBase+58,
  138.         GTSC_Arrows                =GT_TagBase+59,
  139.         GTMN_Menu                =GT_TagBase+60,
  140.         GTMX_Spacing            =GT_TagBase+61,
  141.         GTMN_FullMenu            =GT_TagBase+62,        // 37+
  142.         GTMN_SecondaryError    =GT_TagBase+63,
  143.         GT_Underscore            =GT_TagBase+64,
  144.         GTST_EditHook            =GT_TagBase+55,
  145.         GTIN_EditHook            =GTST_EditHook,
  146.         GTMN_Checkmark            =GT_TagBase+65,        // 39+
  147.         GTMN_AmigaKey            =GT_TagBase+66,
  148.         GTMN_NewLookMenus        =GT_TagBase+67,
  149.         GTCB_Scaled                =GT_TagBase+68,
  150.         GTMX_Scaled                =GT_TagBase+69,
  151.         GTPA_NumColors            =GT_TagBase+70,
  152.         GTMX_TitlePlace        =GT_TagBase+71,
  153.         GTTX_FrontPen            =GT_TagBase+72,
  154.         GTTX_BackPen            =GT_TagBase+73,
  155.         GTTX_Justification    =GT_TagBase+74,
  156.         GTNM_FrontPen            =GT_TagBase+72,
  157.         GTNM_BackPen            =GT_TagBase+73,
  158.         GTNM_Justification    =GT_TagBase+74,
  159.         GTNM_Format                =GT_TagBase+75,
  160.         GTNM_MaxNumberLen        =GT_TagBase+76,
  161.         GTBB_FrameType            =GT_TagBase+77,
  162.         GTLV_MakeVisible        =GT_TagBase+78,
  163.         GTLV_ItemHeight        =GT_TagBase+79,
  164.         GTSL_MaxPixelLen        =GT_TagBase+80,
  165.         GTSL_Justification    =GT_TagBase+81,
  166.         GTPA_ColorTable        =GT_TagBase+82,
  167.         GTLV_CallBack            =GT_TagBase+83,
  168.         GTLV_MaxPen                =GT_TagBase+84,
  169.         GTTX_Clipped            =GT_TagBase+85,
  170.         GTNM_Clipped            =GT_TagBase+85
  171.  
  172. ENUM    GTJ_LEFT,
  173.         GTJ_RIGHT,
  174.         GTJ_CENTER
  175.  
  176. ENUM    BBFT_BUTTON=1,
  177.         BBFT_RIDGE,
  178.         BBFT_ICONDROPBOX
  179.  
  180. CONST    INTERWIDTH=8,
  181.         INTERHEIGHT=4
  182.  
  183. CONST    GADTOOLBIT=$8000
  184. //        GADTOOLMASK=~GADTOOLBIT
  185.  
  186. CONST    LV_DRAW=$202
  187.  
  188. ENUM    LVCB_OK,
  189.         LVCB_UNKNOWN
  190.  
  191. ENUM    LVR_NORMAL,
  192.         LVR_SELECTED,
  193.         LVR_NORMALDISABLED,
  194.         LVR_SELECTEDDISABLED=8
  195.  
  196. OBJECT LVDrawMsg
  197.     MethodID:ULONG,
  198.     RastPort:PTR TO RastPort,
  199.     DrawInfo:PTR TO DrawInfo,
  200.     Bounds:Rectangle,
  201.     State:ULONG
  202.